Apple Reference & Presen…rary 6 (Reseller Edition)/Apple Ref. & Pres. Lib.v6.0.toast/pc/3-Presentations/Apple Demos/Training/HyperCard 2.0 Training/•HC 2.0-4/card_12428.txt

Text File | 1990-04-06 | 4KB | 167 lines

-- card: 12428 from stack: in.0-4
-- bmap block id: 12651
-- flags: 0000
-- background id: 2767
-- name: Ex 1.5
----- HyperTalk script -----
-- The "hideFeedback" handler is in the stack script.
on resetCd
  hide button "choice"
  hideFeedback
end resetCd


-- part 3 (field)
-- low flags: 01
-- high flags: 2000
-- rect: left=152 top=95 right=298 bottom=260
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 14
-- part name:
----- HyperTalk script -----
-- This handler puts the user's answer into the global SelLine.
on mouseUp
  global SelLine

  hideFeedback

  -- Find out which line was clicked:
  get item 2 of the clickLoc - top of me
  put 1 + (it-4) div the textHeight of me into lineNum

  -- Hilite the line (with a hilited btn):
  if lineNum is not 5 and lineNum is not 10 and lineNum is not 15 then
    set top of btn "choice" to ((lineNum-1) * textHeight of me + 99)
    show btn "choice"
  end if

  -- Put the choice into SelLine
  if lineNum > 4 then subtract 1 from lineNum
  if lineNum > 8 then subtract 1 from lineNum
  put lineNum into SelLine

end mouseUp



-- part 4 (button)
-- low flags: 80
-- high flags: 4000
-- rect: left=148 top=197 right=213 bottom=258
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: choice


-- part 5 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=399 top=297 right=315 bottom=458
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Done
----- HyperTalk script -----
-- This handler checks the user's answer.
-- The "noAns" and "ans" handlers are in the stack script.

on mouseUp
  global selLine
  if SelLine is empty then noAns
  else ans SelLine
end mouseUp



-- part 8 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=345 top=320 right=338 bottom=459
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Correct Answer
----- HyperTalk script -----
-- This handler shows the correct answer.

on mouseUp
  hideFeedback
  click at 203,205
  ans 13
end mouseUp



-- part contents for background part 9
----- text -----
5 of 6

-- part contents for background part 6
----- text -----
Here is the HyperCard “Go” menu. Click on the option that will take you to the following piece of information.













-- part contents for card part 3
----- text -----
Back
Home
Help
Recent

First
Prev
Next
Last

Find...
Message
Scroll
Next Window


-- part contents for background part 21
----- text -----
No. ‘Back’ will take you to the last card you saw.
No. ‘Home’ will take you to the HyperCard Home stack.
No. ‘Help’ will take you to the HyperCard Help stack.
No. ‘Recent’ will show you the last 42 cards you’ve seen in HyperCard, and let you go to one of them.
No. ‘First’ will take you to the first card in a HyperCard stack.
No. ‘Prev’ will take you to the previous card in a HyperCard stack.
Correct. The ‘Next’ menu option will take you to the next card in a HyperCard stack.
No. ‘Last’ will take you to the last card in a HyperCard stack.
No. ‘Find...’ will help you search for a word or phrase in a stack.
No. ‘Message’ will bring up the HyperCard message box.
No. ‘Scroll’ will bring up a window that lets you determine which part of the screen to view.
No. ‘Next Window’ will bring the next window to the front.
This is the correct answer. The ‘Next’ menu option will take you to the next card in a HyperCard stack.